home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / comm / misc / MPackMUI.lha / MPackMUI / Install < prev    next >
Encoding:
Text File  |  2000-08-25  |  849 b   |  44 lines
  1. ; MPackMUI Installer V1.01
  2. ;
  3. ; ToneMaster, 2000
  4.  
  5. (set #DefaultDir
  6.     (askdir
  7.         (prompt "Where do you want MPackMUI installed?\n(a directory called MPackMUI will be created)")
  8.         (help "MPackMUI will be installed in a drawer called MPackMUI, in the directory you select")
  9.         (default @default-dest)
  10.         (newpath)
  11.     )
  12. )
  13.  
  14. (set #MPDir (tackon #DefaultDir "MPackMUI"))
  15.  
  16. (makedir #MPDir
  17.     (safe)
  18.     (infos)
  19. )
  20.  
  21. (copyfiles
  22.     (source "")
  23.     (choices "MPackMUI" "MPackMUI.readme" "Docs")
  24.     (infos)
  25.     (dest #MPDir)
  26. )
  27.  
  28. (set copysource
  29.     (askbool
  30.         (prompt "Do you want to install the source code?")
  31.         (help "The source code is only useful to programmers")
  32.         (default 1)
  33.     )
  34. )
  35.  
  36. (if (= copysource 1)
  37.     (copyfiles
  38.         (source "")
  39.         (choices "Source")
  40.         (infos)
  41.         (dest #MPDir)
  42.     )
  43. )
  44.